home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Ham Radio 2000
/
Ham Radio 2000.iso
/
ham2000
/
misc
/
nshadow
/
eqtime.bas
< prev
next >
Wrap
BASIC Source File
|
1994-06-23
|
314b
|
9 lines
10 INPUT "ENTER MONTH NUMBER (MO)"; MO
20 INPUT "ENTER DAY NUMBER (DA)"; DA
30 INPUT "ENTER MINUTES (M)"; M
40 INPUT "ENTER SECONDS (S)"; S
50 E=(M+S/60)/60
60 PRINT MO;DA " DATE"
70 PRINT M;S " EQUATION OF TIME IN MINUTES AND SECONDS"
80 PRINT E " EQUATION OF TIME IN DECIMAL HOURS"